home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / prolog / ai.prl / opnprlg1.hqx / Open Prolog / Open Prolog.rsrc / CODE_29_debugStub.txt < prev    next >
Text File  |  1993-04-15  |  7KB  |  118 lines
  1. # near model CODE resource
  2. # entry label at 0x0000
  3. export_409:
  4. entry:
  5. 00000000  4FEF FFFA                lea.l      A7, [A7 - 0x6]
  6. 00000004  2E6F 0006                movea.l    A7, [A7 + 0x6]
  7. 00000008  3F7C 0030 0004           move.w     [A7 + 0x4], 0x30 /* '0' */
  8. 0000000E  4EFA 0010                jmp        [PC + 0x10 /* 00000020 */]
  9. 00000012  8A44                     or.w       D5, D4
  10. 00000014  4542                     chk.w      D2, D2
  11. 00000016  5547                     subq.w     D7, 2
  12. 00000018  4348                     chk.w      D1, A0
  13. 0000001A  4543                     chk.w      D2, D3
  14. 0000001C  4B20                     .invalid   5, -[A0] // invalid opcode 4 with b == 4
  15. 0000001E  0000 4E56                ori.b      D0, 0x56 /* 'V' */
  16. // begin alternate branch 00000020-0000002E
  17. export_410:
  18. label00000020:
  19. 00000020  4E56 0000                link       A6, 0
  20. 00000024  42AE 0012                clr.l      [A6 + 0x12]
  21. 00000028  0C6E 0019 0008           cmpi.w     [A6 + 0x8], 0x19
  22. // end alternate branch 00000020-0000002E
  23. export_410: // at 00000020 (misaligned)
  24. label00000020: // (misaligned)
  25. 00000022  0000 42AE                ori.b      D0, 0xAE
  26. 00000026  0012 0C6E                ori.b      [A2], 0x6E /* 'n' */
  27. 0000002A  0019 0008                ori.b      [A1]+, 0x8
  28. 0000002E  6600 000A                bne        +0xC /* 0000003A */
  29. 00000032  42AD F51A                clr.l      [A5 - 0xAE6]
  30. 00000036  426D F51E                clr.w      [A5 - 0xAE2]
  31. label0000003A:
  32. 0000003A  082D 0001 F51E           btst.b     [A5 - 0xAE2], 0x1
  33. 00000040  6600 0074                bne        +0x76 /* 000000B6 */
  34. 00000044  08ED 0003 F51E           bset.b     [A5 - 0xAE2], 0x3
  35. 0000004A  670A                     beq        +0xC /* 00000056 */
  36. 0000004C  082D 0002 F51E           btst.b     [A5 - 0xAE2], 0x2
  37. 00000052  6700 00C4                beq        +0xC6 /* 00000118 */
  38. label00000056:
  39. 00000056  4FEF FFFC                lea.l      A7, [A7 - 0x4]
  40. 0000005A  2F3C 7072 6C63           move.l     -[A7], 0x70726C63 /* 'prlc' */
  41. 00000060  487A 00D4                pea.l      [PC + 0xD4 /* 00000136, pstring "Debugger" */]
  42. 00000064  A9A1                     trap       GetNamedResource
  43. 00000066  205F                     movea.l    A0, [A7]+
  44. 00000068  0C78 FF40 0A60           cmpi.w     [0x00000A60 /* ResErr */], 0xFF40
  45. 0000006E  6700 00A8                beq        +0xAA /* 00000118 */
  46. 00000072  3F38 0A60                move.w     -[A7], [0x00000A60 /* ResErr */]
  47. 00000076  6708                     beq        +0xA /* 00000080 */
  48. 00000078  487A 00B0                pea.l      [PC + 0xB0 /* 0000012A */]
  49. 0000007C  4EAD 0CD2                jsr        [A5 + 0xCD2]
  50. label00000080:
  51. 00000080  548F                     addq.l     A7, 2
  52. 00000082  A029                     trap       HLock
  53. 00000084  3F38 0220                move.w     -[A7], [0x00000220 /* MemErr */]
  54. 00000088  6708                     beq        +0xA /* 00000092 */
  55. 0000008A  487A 009E                pea.l      [PC + 0x9E /* 0000012A */]
  56. 0000008E  4EAD 0CD2                jsr        [A5 + 0xCD2]
  57. label00000092:
  58. 00000092  548F                     addq.l     A7, 2
  59. 00000094  2B50 F516                move.l     [A5 - 0xAEA], [A0]
  60. 00000098  08ED 0002 F51E           bset.b     [A5 - 0xAE2], 0x2
  61. 0000009E  08ED 0001 F51E           bset.b     [A5 - 0xAE2], 0x1
  62. 000000A4  41ED 0392                lea.l      A0, [A5 + 0x392]
  63. 000000A8  2B48 F50E                move.l     [A5 - 0xAF2], A0
  64. 000000AC  43ED 038A                lea.l      A1, [A5 + 0x38A]
  65. 000000B0  91C9                     sub.l      A0, A1
  66. 000000B2  2B49 F512                move.l     [A5 - 0xAEE], A1
  67. label000000B6:
  68. 000000B6  52AD F51A                addq.l     [A5 - 0xAE6], 1
  69. 000000BA  2B57 F50A                move.l     [A5 - 0xAF6], [A7]
  70. 000000BE  4FEF FFFC                lea.l      A7, [A7 - 0x4]
  71. 000000C2  3F2E 0008                move.w     -[A7], [A6 + 0x8]
  72. 000000C6  486D F506                pea.l      [A5 - 0xAFA]
  73. 000000CA  206D F516                movea.l    A0, [A5 - 0xAEA]
  74. 000000CE  4E90                     jsr        [A0]
  75. 000000D0  53AD F51A                subq.l     [A5 - 0xAE6], 1
  76. 000000D4  6642                     bne        +0x44 /* 00000118 */
  77. 000000D6  206D F516                movea.l    A0, [A5 - 0xAEA]
  78. 000000DA  A128                     trap       RecoverHandle, flags=1
  79. 000000DC  3F38 0220                move.w     -[A7], [0x00000220 /* MemErr */]
  80. 000000E0  6708                     beq        +0xA /* 000000EA */
  81. 000000E2  487A 0046                pea.l      [PC + 0x46 /* 0000012A */]
  82. 000000E6  4EAD 0CD2                jsr        [A5 + 0xCD2]
  83. label000000EA:
  84. 000000EA  548F                     addq.l     A7, 2
  85. 000000EC  A02A                     trap       HUnlock
  86. 000000EE  3F38 0220                move.w     -[A7], [0x00000220 /* MemErr */]
  87. 000000F2  6708                     beq        +0xA /* 000000FC */
  88. 000000F4  487A 0034                pea.l      [PC + 0x34 /* 0000012A */]
  89. 000000F8  4EAD 0CD2                jsr        [A5 + 0xCD2]
  90. label000000FC:
  91. 000000FC  548F                     addq.l     A7, 2
  92. 000000FE  2F08                     move.l     -[A7], A0
  93. 00000100  A9A3                     trap       ReleaseResource
  94. 00000102  3F38 0A60                move.w     -[A7], [0x00000A60 /* ResErr */]
  95. 00000106  6708                     beq        +0xA /* 00000110 */
  96. 00000108  487A 0020                pea.l      [PC + 0x20 /* 0000012A */]
  97. 0000010C  4EAD 0CD2                jsr        [A5 + 0xCD2]
  98. label00000110:
  99. 00000110  548F                     addq.l     A7, 2
  100. 00000112  08AD 0001 F51E           bclr.b     [A5 - 0xAE2], 0x1
  101. label00000118:
  102. 00000118  2D5F 0012                move.l     [A6 + 0x12], [A7]+
  103. 0000011C  4E5E                     unlink     A6
  104. 0000011E  2F57 000A                move.l     [A7 + 0xA], [A7]
  105. 00000122  4FEF 000A                lea.l      A7, [A7 + 0xA]
  106. 00000126  4E75                     rts
  107. 00000128  4E75                     rts
  108. 0000012A  8844                     or.w       D4, D4
  109. 0000012C  4542                     chk.w      D2, D2
  110. 0000012E  5547                     subq.w     D7, 2
  111. 00000130  4745                     chk.w      D3, D5
  112. 00000132  5220                     addq.b     -[A0], 1
  113. 00000134  0000 0844                ori.b      D0, 0x44 /* 'D' */
  114. 00000138  6562                     bcs        +0x64 /* 0000019C */
  115. 0000013A  7567                     moveq.l    D2, 0x67
  116. 0000013C  6765                     beq        +0x67 /* 000001A3 */
  117. 0000013E  7200                     moveq.l    D1, 0x00
  118.